﻿Imports UMesPlatform.BussinesRule.Bussines
Imports UMesPlatform.DTO
Imports UMesPlatform.Base
Partial Class uMESCustomControls_createBarCode_TwoBarCode
    Inherits System.Web.UI.UserControl

    Protected Sub btnCreateTwoBarCode_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnCreateTwoBarCode.Click
        Dim twoBarCodeParam As TwoBarCodeParameter = New TwoBarCodeParameter()
        Dim results As BusResultMessage = New BusResultMessage()
        Dim base As BaseHelper = New BaseHelper()

        twoBarCodeParam = base.GetConfigSettingByTwoBarCode()
        twoBarCodeParam.Data = TxtQRCode.Text
        'twoBarCodeParam.Encode = "Byte"
        'twoBarCodeParam.ErrorCorrection = "M"
        'twoBarCodeParam.Size = "4"
        'twoBarCodeParam.Version = "7"
        'results = BarCodeHelper.GetTwoBarCode(twoBarCodeParam)

        Me.ImgTwoBarCode.ImageUrl = results.Message
    End Sub
End Class
